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PREFACE 


By purchasing this book you have shown more than a passing 
interest in computing. Perhaps you have grown tired of playing 
games on the VZ. With a certain amount of time taken to learn the 
BASIC language, you should be able to write your own games 
Programmes. Of course there are many other practical uses that 
the VZ can be applied to. For this sort of information it is 
useful to join a users group (club) whereby you can talk direct 
to people with practical knowlege . 


I have attempted to keep the programmes reasonably short, at 
least no longer than three pages. The first few are only a few 
lines long so that you can build up your typing skill and 
patience. The Machine Language (M/L) programmes or routines are 
for the advanced programmer, but there should be no reason why 
YOU should not be able to impliment those within a few months. 


Then there are a few simple and not so simple hardware 
Circuits for modifications or more advanced items. 


In any case 1 hope YOU enjoy the contents of the book and 
perhaps introduce others to it. 


John D'Alton. 
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INTRODUCTION 


Most of the BASIC programmes can be used with an unexpanded 
у2200 (ек). The rest can be accommadated in an unexpanded VzZ300 
(18K )or an expanded VzZ200 (2PK), 


I recommend the use of the special VZ Data Cassette Recorder 
which is especially designed to work with the VZ. There is no 
volume control to set and fiddle with, just play or record. Of 
course if you have the Disc Drive System the programmes are saved 
and loaded in a fraction of the time taken with the DTR. 


It is a MUST that after you have typed in say a quarter of an 
hour of a programme to IMMEDIATLY <CSAVE> or <SAVE> i¢ you have 
the Disc System BEFORE you LIST or RUN the programme (if you 
reached the end of it). ALWAYS save the partly typed programme 
with a name and a NUMBER. Say you start typing a programme called 
ADVENTURE, Call it "ADVENTURE 1". Then you can list or run it if 
you wish. Continue typing more of the programme and save it as 
"ADVENTURE 2", and so on until you have typed in the entire 
programme. Save it as ADVENTURE 7+", which means the seventh and 
final. 


The reason for SAVING a typing session BEFORE listing and in 
particular RUNNING it, is that there may be (probably will be) 
mistakes in either your typing or the printing o* the programme. 
If that is the case and you attemt ta RUN the programme, the VZ 
пау LOCK UP. That means that the VZ cannot carry out all the 
steps in it, and just can’t continue, so there will be no 
flashing cursor or READY message. You will not be able to BREAK 
the VZ. You will not be able to SAVE what you have spent in the 
worst case hours to type in. If you did SAVE the programme, it’s 
just а matter of switching off the VZ and loading back from the 
tape (or Disc) the programme and attempt to find the mistake or 
BUG. 

Most programmes are for use with a tape based VZ, with the 
others suitable for a disc system. 

You cen modify some programmes to allow their use in your own 
programmes, іп this way you will be learning programming at the 
same time, Some аге badly written in an inefficient manner, so 
this also gives you more practice in tidying them up. Others are 
not games or complete programmes and are called routines. these 
can also be included in your own programmes. 


There is Other useful information such 6S communication 
addresses, PEEKS and POKES which will seem strange to a newcomer 
but are easy to use, There are twenty three Extended Basic 
Commands resident in the ROMs which can be implimented by POKES 
or by the use of the Ext. BASIC tape. 


Warning!!! I will not take any responsibility for any damage 
cesuzed by any hardware modification/s and/or addons. Any such 
hardware work is carried out at the owner/users risk. 


ALL CARE HAS BEEN TAKEN TO RE-PEODUCE ALL LISTINGS AND OTHER 
MATERIAL ERROR FREE,BUT NO RESPONSIBILITY IS ACCEPTED WHATSOEVER 
FOR ANY ERRORS OR DAMAGE TG ANY ASSCOTIATED COMPUTER EQUIPMENT 
CAUSED BY ANY ITEM! 


TO START COMPUTING- 





i do not intend teaching you all the basic operational and 
computing details which are discussed in the VZ200 and VZ300 
Basic Reference Manuals (B.F. Mo, but only» to elaborate on some 
of the points that do seem to confuse the beginner. Always refer 
to the B.F.M. in conjuction with this Book. I suggest that you 
start at the front of the B.F.M. and practice on the VZ until the 
end of the B.F.M. is reached. 


There are some points that are not mentioned in the Б.Е. М. 
that are in this book that will make computing quite a lot 
easier. All programme listings are <LLISTings> directly from the 
programme, Lie the programme SHOULD be bus free. à BUG in a 
programme is an ERROR of FAULT. 


EDITING. 





One of the most important computing tasks that should be 
mastered very early is the EDITing function. This function or the 
VZ is what is called "а full on screen editor”. After «&LISTing^» a 
programme, READY and flashing cursor appear, you can then «RUN» 
DEBIT it; 

All that is necessary to EDIT it is to move the cursor around 
anywhere on the Screen -and type, 4INSERT» or <RUBOUT> 
character/s. Then <RETURN>. With Some computers of the very well 
known variety, you have to call up the line to edit, or go to an 
EDIT mode. 

With a. "FRUITY" compatable that I work on, it if quite a 
pain. The cursor is moved up to the first digit of the line 
number of the line that is to be edited, then type over the 
correctior, or re-type the whole line. If there are more 
characters on the line which must remain, then the cursor must be 

РЕ гип іс the end of the line and only then is the «RETURN? key 
typed. I+ net the characters to the end of the line are erased 
fros memory. The cursor is moved around on the screen by pressing 
otber control keys. YUK, what an effort. 


So I stress that the VZ is one of the тен MOST EASILY EDITED 
HINES. To a beginner it is a charm. 








If the programme has a few lines which are Similar then 
rather than type the lines fully, here is a short cut method. 


Say the programme has a menu something like this:- 
1 ООТЕХ= 1 ТНЕМЕООО 
LLIOIFX=2THENGOOO 


etc. 


then type line 100 only, «LIST? then move the cursor onto line 
100 and change the line number to "110". Change the "1" to "2" 
гпа "5000" to "6000", and «RETURN». 


«LIST? again and you will have the two lines, 100 and 110. 
In large programmes there could be many lines that are very 
similar, so much time can be saved with this method. 
REMARKS. 
Use е geod sprinkling of <REMark? statements in your 
programmes to describe what various parts are for. The Vz will 


rot accept graphic symbols іп а <REMark> line unless they are 
enclosed in quotation markz, thus:- 


260 REM" SCORE FTE " 


SPACES. 
TO indicate a space in a filename or programme when writing 
it by hand, use a symbol that is not used by the Ve. I use a 


horizontal squigle "4M". So tor a filename I write thus.- 


CSAVE"WORD САМЕ „и " 


ТАРЕ SAVING. 


Another time sever when you have just «XCSAVEd» a programme 
end you wish to «VERIFY? it, IE.  CSAVE*CIRCLES 4" 


Move the cursor up onto СРО. Чо опе ol insert ( 
<CTRLO< INSERT?) then VERIFY <CTRLO<C VERIFY 7CRETUORN?. 


The screen should Бе:- 
VERIFY" CIRCLES 4" 


That not only saves time but ensures that you have entered 
the EXACT filename into the Vz. 


Of course а programme can Be “WVERiFied> without giving а 
filename, but the М2 will try to werity the first programme on 
the tape it receives. 
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LINE NUMBERS, 

A beginner should type in the line numbers as they are in the 
EPISTins» end not change them. This is because there may be 
SGOTO> and <GOSUE> statements in the programme, and if you change 
a line number say from :- 

SSOOINPUT"PFRESS RETURN TO CONTINUE”; 0§ 
to sayi- я 
SSSOINPUT"FRESS RETURN TO CONTINUE":@¢ 


end if there is a line :- 
730550105500 


you will get the error message on the screen :- 
UNDEF'D STATEMENT IN LINE 7305. 


AS you become more experienced, you can change line numbers, 
There will be times wher you will need to fit more statements in 
в section of a programme, but there are no more line numbers to 
use. 

IE., you have used all the line numbers from 4550 to 4575, 
but have to put a statement in line 4570. You then have to make 
meme 4570 -» 4571, 4571 -5 4572 etc. You then have to change any 
“GOTO> and <GOSUP> statements to suit. 


This iS easy with small Programmes, But it’s a different 
Situation with large ones. The statement/command called 
*RENUMEER” in the EXTENDED BASIC unit will do this tor you, by 
Changing line numbers and ¢<GOTO>/<GOSUB> numbers automatically. 


If you are writing your own programme, I suggest that the 
First line number be 1000. The various "blocks" of the programme 
Should be iri multiples of 1000. So The MENU could Commence on 
#600 and other "blocks" at 2000, 4000, 5000, 6000, 10000 etc. 


By not doing this and starting at line 10, you will soon find 
That there are not enough line numbers at the start to add other 
Sections to it. 
















You can use the AUTO line number option in the EXTENDED BASIC 
mr this simple method to automatically set the Starting line 
member and increment value. 


з line O (zero) type, 

БЕМ1000,20 :- 

ӘБЕМІСОО,20 

мо» without typing a line number, type in immediate mode:- POKE 
S469, 183<RETURN> 


| This sets the VZ in AUTO LINE NUMBER mode. 

Мои <RUN><RETURND 

sea the screen will show 1000 with cursor ready for you to type 
Re statement. After <RETURN> the next line number will be £020. 
The increments will be by 20. To start at 4500 in increments 


* I0, then line :- ОРЕМ4500, 10 


То RUN your prooramme, CRUN?2 1O00 or whatever the commencing 
Е іс. To continue in AUTO mode just <RUN><RETURN>, The first 
With statement will show and can be edited i¢ required or 
es is i- <RETURN?>. The next line will show and so On. When 
finished with AUTO just erase line O:- O<RETURN> 


+ you want AUTO back again, type O and the POKE as before. 
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DELETE. 


To delete а line just type the line number and RETURN?» If 
there are lots of consecetive lines to erase this is a quick 
method. DELETE is another .EXTENDED BASIC command, But it can be 
implimented just as easily as the AUTO command. 

Type OD2300-S000< RETURN > 


POKE31469, 182<RETURN> 
<RUN>< RETURN > 


Lines 2300 to 3000 will be deleted. So set the two numbers on 
line O to suit. When finished, erase line O. 


HINTS. 


А comma "," can be typed instead of "THEN" in an "IF THEN" 
statement. 


A question mark "?" can be typed instead of "FRINT" in a 
PRINT statement. 

Ап apostrophe "°" can be typed instead of a "КЕМ" іп а КЕМ 
statement. | 


In a SOUND statement, 1% is not necessary to type thus.- 
SOUND15, 5: SOUND12, 3: SOUND20, 1 

as the short method is thus: - 

SOUND15,55195,3520,1 
note the semicolon "35", 


COMMUNICATIONS ADDRESSES. 


ad 


РЗЕЭН & 7ВЕЕН the starting address of free space in RAP. 
7GF6H & 78F7H last line number excecuted. 

7SE2H & YSESH starting line number. 

78e99H single byte, last key pressed. 

789EH single byte, high or low res. 

?вған single byte, error code storage. 

78A2H № УЗАЗН current line number. 

78A7H & YBASH address of the start of the keyboard buffer. 
798D65H %  78D7H address of the next available location in the 
string area. 

78DAH & YEDDH line number of the last DATA statement read. 
7921H & 7922H USR argument address. 

7815H B disable keyboard. 


7818H 1 inverse VDU. 





NOW SOME PROGRAMMING HINTS. 


———————————————— M ——MsÀ Е —А——————————_ 


This short routine is similar to the AUTO and DELETE one 
discussed elsewhere, line 500: must be the first line of your 


programme, 215 is the TOKEN POKEd to give free memory in number 
of bytes EI. ҒРЕ (0) 


О РЕІМТРРІМТ (0) 


REM ГІМЕ 500 "FRE(O)” IS t 
2106 к ! IS PON Use it to give some indication 


BY 31470,218 | 
of free available.mem j 
КЕЗ! 470,213 1 SEM ory while 
| you ere writing а large 


programme. 


Бе o 


TRON AND TROFF. 


| This is used to "trace" га programme from line number to line 7 

t prints on the VDU. the line numbers in horizontal vees 
5%. If there is text or graphics on the VDU., the line 
ill of course print over the top of those. 


POKES1003,175 enables TRON. 


POKE31003,0 disables (switches off) TROFF. 


This will print on the VDU. or printer the characters after 
the CHRS(13) part of the statement, on the next line. The same as 
a Carriage Return. 


50 REM PRINTS CHARACTERS ON NEXT LINE 
00 РКІМТ "АВС"; СНЕФ (15); "125" 


LBC 
25 


—Ar 


{joe РЗ д ммс ": 
w - ~ ' . . ~ 


This routine inverses the INPUT statement on the VDU. arid 
also PRINTS in inverse. This ic acheived Ьу | line 70, then 
dis-enabled by line 100. 


3 REM INVERSE INPUT AND PRINT 
5 CLS 

10 PRINT"START" 

SO IMPUT"ENTER NAME ";gs 

70 POKESO726,10:INPUT"AGE ";A& 
80 РБІМТ"МАМЕ "се 

90 PRINT"AGE "ras 

100 РОКЕЗО?76, 1 

200 INPUT"TIME ";T& 

220 PRINT"TIME ";T& 


This routine inverses the PRINT of a $string on the VDU. and 
a printer, iT it is programmed to do SO. Line 180 with OR 


statement enables it, and line 220 with the AND Statement 
dis-enables 1+. 


90 CLS 

100 REM TO INVERSE 4 STRING WITHIN A PROGRAMME. 
120 AS="TEST PROGRAMME” 

130 B-15432 

150 PRINTAS:PRINTE 

160 РЕТМТ*-- - Le = 
150 РОКЕЗО7? Е PEERU EIVOR? 

200 РЕТМТАФ: РЕТМТВ 

220 РОКЕЗО??6 , PEEK (30776) AND253 
240 MET E ec сен... 9 
230 РКЕТМТАЯ: РЕТМТЕ 


TEST PROGRAMME 
15422 


E LLLI rr کک کک‎ 


TEST PROGRAMME 
13432 








B as p ë $ip e; 
Peer VENT OK VHRR DUAR VOL 1 FAGE > 





























— Variation to IMKETS. 
E" is uted to allow entry of a key without having to press the <RET | 
In a menu if a letter is asked for the instructions are thus.... | 


le КЕТ YARIATION TO "INKEYS" CONVERT TO ASCII FOR MENU SELECT 
1 РЕІНТ"А = AAA 
ОРЕ: NI"B = БЕР" 
INT"C = CCC" 
S PRINT" TYPE IN A ~ C FOR SELECTION" 
Б; S-IHKETYS 
TIMES: IFAS=""THENI BS 
3 RS-RSC(CRS ) 
X IFRS-65THEHPRIHT"YOU SELECTED RRR":END 
25 1ЕЯ5=БЕТНЕНРЕ1НТ" 00 SELECTED BEB": END 
[48 IFAS=67THEMPRINT" YOU SELECTED CCC": END | 
|45 IFRS»ETORRS &&STHENPRIHT"SELECT RGRIN":GOTO186 


This short routine flashes "C" on the VDU. waiting for the 
C" key to be pressed so that the programme ca^" continue. 


REM FLASHING " C " | 
| PRINT@425, "PRESS 60> TO CONTINUE"; 

MB PRIHTEdSz, "C 
gei FDKI-ITQSOE: HEXT 
= PRINT@#492," =; 
45 FORT-1TOS88:HEXT | 
Bose GOTOIBBAA | 


жез EHD 


әсте сотоійбй1өз 


Р 
4 


" 
Б... one will allow а ВМС BX-80 printer to work from the COPY 
peee2nd. £or HI-RES or LO-RES, 


ur 
5 


_ОРЕЕЯТЕ ВМХ BC-88 PRINTER IN COPY MODE 
LPRINTCHES 15 
RINTCHRS 27 ); "R'; CHRSCEO; 
RY“=2T063 
FORA%=010127 | | 
P=POINTCH%, 7%) | 
BEST UTHENLPRINT” "4 «NEXT: GOTOLe7@ 
LINT" 3"; NEXT 

NEXT 
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а 
aa ГЕЧЕ 


RU E‏ کک و کے س 





This one flashes the message "X*X* STOF TAPE XX*X" on the 
VDU. 


if CLS 
“4 FORL=17TOe 
a4 PRINT@ESG. "444% STOP ТАРЕ ЖЖЖЖ" 
Ем FPRIHNTIZGD," " 


JOYSTICK DRAWER 

19 MODE(C1) 

29 Х=В 

ҙа ай. 

40 A-CINPC43)6ND31) 

50 IF6-236NDX€122THENX-X*1 - 
ва IFG-22aNDX» OTHENX-X- 1 
"О IEAs300nNDY» PTHENY-Y-1 
ав IFA6-296HDY «G3THENY-Y*] 
9B SETCX, Y) 

1008 6507042 


BASIC DODGE 

S POKE30@744,1:? IF YOU HAVE A EARLIER UZ 
YOU DO NOT NEED THE POKE 

6 CLS 

19 A=28672:x=16 

20 IS-INKEYS:IF I$-"K"THENX-X-1 

30 IFIS$-"L'"THENX-2X*1 

40 IFPEEK(A*X) 4» 32THEN200 

S6 PRINTGx,"U"5:S-S«*] 

60 FPRINT&€48O0*RNDC312, "X" 

28 GOTO 20 

288 CLS 

218 SOLIND1, 1L :PRINT"GAME OUER 9 ? 2" 
226 PRINT" SCORE="5S 

23@ IF INKEY$-"S"THEN RUN ELSE 230 
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Ll. 
CIMET EA > 

PPIHT"HELLO MY HRME IS Mz-38]" 

THEUT"WHAT Іс ТОМЫ HAME (FIRETELAST oS AS: IFAS=""THEMSS 
і ЕНЕНЕ л | 
POTHT:PRIMT: PRINT" THAME YOU 9. 
FORIZITOL:BSCIOGZHMIDTSRTI1 2: HEZRTI 
FüRIZsLTOISTEF-1:PEIHTEST:IO::HESXTI 
PEPIMT".":PRIHT"OOPZ I GUESS I GOT IT BACKHARDS" 
PPIHT"R SMAFT COMPUTER LIKE ME SHOULD” 
-PPTHT"HOT MAKE A MISTAKE LIKE THAT!" 
PRIHT'"BLUT I JUST HOTICED YOUE LETTERS" 
PPEIHT"PRE QIIT OF DREDEE." 
PPRIHT"LETZ PUT THEM LIKE THIS: " 

ЕПЕ de2 TG L':ied-1 :Т©==р{ К dJ 

IF TS2BEC IOTHEM 128 

Bie [+1 2 Bee I>: I=I-1: IFIS@THEMLIS 

EF 1+1 = TH: HEAT "n 
FORI-ITOL:PRIHTES:IO;  HEZT:PEIHT: PEIHI 
IMPUT"DOHMT YOU LIKE THAT BETTER’: 4 
IFOS=H"(ES"THEMLES 
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FEM TEST ANE JOYSTICK 
MEZ 
zGIHFZada2^HHD21» 
IFHZ3BMTHEHFEIHT"UP":fr.rnTDPB 
IFRZZS9THEHFRIHT"D(OUMNH" : GüuTO2E 
IFHZZ"THEHPREIHT"LEFT":üGaTaztec 
IFR-Z3STHEHPFRIHT"FIGHT" 
“TOZA 
TEST HITS LILES 
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ТЕЯ=22ТНЕНРЕТНТЕ ++" ЕТСНТ+ИР" : СОТОЗЯЙ 
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[255 FORG=-1T01 

Ж ӘС СЕТА АЕА тт 

Рта НЕХТ: НЕХТ: БОТ ЯВ 
220 GOTOLGS 
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4-57 FüER-iTOIO:FOüRG-1TÜUS 
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тей ЕСЕН-1Т702 
| 578 PDKESITIT-HR, HSCOMIDECCS. B. 122 
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| Бап MODE 1 5: COTO4A 





mis programme requires a Disc System. Note the DATA statement 
| 505 and 307. The DATA is of course in decimal, which 
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P=1°REMNSSORT SIR КЕЯ 
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WORD PROCESSOR. 
[=н ест e ты та اا‎ 
TO the beginner this sounds a complicated piece of machinery 
but it is not, so I will give a short description of it. 


With a word processor, you can write letters, assignments, 
recipes, notes, stories for magazines and SO on. 


This book and my LE'VZ newsletter are written using the Dick 
Smith Electronics tape Word Processor. It is really quite an 
edvarced unit, written in Machine Language 50 is quite fast in 
use. You type as you would on a type-writer but if a mistake is 
typed, you just correct it and continue. Characters, lines, 
paragraphs or whole pages of text can be inserted, deleted, moved 
or copied from anywhere to anywhere within seconds. The same 
facilities apply to a printer or tape. 


The format to a printer can vary also. Left margin, width of 
page, right justification or wragged, double spacing and so on. 


A word can be searched and replaced by another one. IE. the 
word "Holden" could be replaced by "Ford" in all or some of the 
text. And so on, too much to describe fully here. Ask your 
friendly D.S.E. staff to demonstrate it to you. 


EXTENDED BASIC. 


There are many more BASIC commands/statements that 
can be implimerted by the use of Steve Olney’s Extended 
Basic tape unit. The commands and routines exist in the 
ROM/S but for various reasons are not directly 
accessable to the user. The Extended Basic unit checks 
for the size of the VZ’s memory and allows you to use 
about twenty five more commands. ТУЕ 315.06. 


The Tandy book which would be hard to obtain пом 
celled "LEARNING TRS SO BASIC FOR MODELS 1, 11/16 AND 3S 
EY DAVID A.LIEM" is about the best text book to teach 
you Basic programming. It contains information on the 
Extended Basic commands/statements. 
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HI-RES GRAPHICS GEOMETRIC PLOTTING. 
( A PLEA FOR MORE READABLE BASIC PROGRAMS ) 


The following program is a simple line plotting routine using 
-E2-res graphics screen. It was written to try and demonstrate how 
pscing skills can be improved by following a few simple guidelines. 


Unfortunately published programs in magazines are generally 
دا س‎ of how to develope good programming style. A number of 
(Шау have taken the trouble to to enter a listing from a magazine - 
- Spon running the program have found that all is not well with the 
А long, tedious and frustrating session-of understanding the - 
iy constructed code, determining all the twists and turns of the 
meical spaghetti' and debugging-commences. A usual remedy is to 


—write the program from scratch. Not a very efficient process! 





| 


: The program below is 
Е Clearly coded and set out - an enormous help in UNDERSTANDINC. 
Т. The program is STRUCTURED - a good algorithm is selected and the 
program ‘flows’ through initialization 
- to input, procedure and output sections. 
- Loops are indented for ease of identification and nesting. 
=. Naming of variables is meaningfül to assist maintenance. and debugging. 
З integer storage is used where appropriate. 
Е Wo abbreviated forms of BASIC statements are used. 


Ж Remarks are liberally sprinkled throughout to aid clarity. 
=. Error capture and range checking on all input variables prevents 
— program from crashing. | 


Clear readable code is more important than the execution speed 
2rage requirements of the program - interpreted BASIC runs like а 
EG snail in any case! 


ba 








" 


These guidelines should lead to code that is easier to read, 
E and debug. This leads to easier maintenance, updating or 
pemsion of your routines as your programming skills develope. 


10 REM EKEKKKKKKKEKKEKKEKKKKKKKKKKKKK KKK 

_ 20 REM PLOT A SET OF UP TO 20 LINES Introduction to program, i 
30 REM USING THE HI-RES SCREEN. version and author. | 
REM R.B.KITCH 22/10/85 | 


REM LEZZEXZXZIIIZIZIIIIIIIIIIIITIIIIIIILI. 


40 
50 
00 REM DIM STORAGE VECTORS X% & Y% | 
210 DIM X2(290), Y2(20) Vectors to hold end coordinates 
` 120 REM ***ACCEPT INPUT AND CHECK***** of LN$ lines - LN$-41 points. | 
_ 120 PRINT"HOW MANY LINES - MAX 20": 
3 INPUT LNZ | | 
250 FOR IZ - 0 TO LN2 Loop for LN$41 X-Y points. 











/ 160 PRINT"ENTER X-VAL 0-127": | 
р INPUT X%(1%) 
IES OF Х%(1%)>127 Check value not off screen. | 
PRINT"ENTER Y-VAL 0-63": | 
INPUT Ү%(1%) 
о OR Ү%(1%)>63 Check value not off screen. 
NEXT Iz | End of input loop. 
REM***SET UP SCREEN AND MAIN LOOP* 72 put oop. 
MODE(1) Switch screen to hi-res. 
FOR IZ - O TO LN£-1 Initialize main loop for lines. 





Х1:2-Х%2(1%):Х2%-Х%(1%:ғ1) Assign end points of line to | 
Yiz-YZ(12):Y22-Y£(I2*41) temporary variables. | 





350 
360 


370 
400 
110 
420 
430 


500 
510 
520 
530 
540 
550 
560 
570 
580 
600 
610 
620 
630 
640 
650 
660 
670 
700 
710 
800 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 


Lines 300-710 are a general purpose rs 


***ARE POINTS THE SANE?****x*** 
IF X12«2X2€3 OR Y1z2«2Y2* THEN 
60 ТО 410 

ЗЕТ(Х1%,\1%):60 ТО 710 

***CALC X AND Y DIFFERENCE**** 
0Х%=Х2%-Х1% : 0У% =У2%-11% 

***SEE WHICH IS LARGER******** 
IF ABS(DX%)>ABS(DY%) THEN 

GO TO 610 

*x***x INCREMENT [ Y ke e + + 
YS%=SGN(DY%) :DG=DX%/DY% 
Х0=Х1%+0.5 | 

FOR IY% = Y1% TO Y2% STEP YS% 
TP=(1Y%-Y1%) *DG+X0 
ІХ%-ІКТ(ТР) 

SET(IXZ,IY2): 

IY% 


REM 


REM 
REM 


REM 


NEXT 
GO TO 710 
REM***INCREMENT ] Xo o eee e de eee 
XS%=SGN(DX%) :DG=DY%/DX% 
YO=Y1%+0.5 
FOR IX% = X1% TO X2% STEP XS% 
TP=(1X%-X1%) *DG+YO 
IY$-INT(TP) 
SET(IXZ,IY£) 
NEXT IX% | 
REM***END LOOP FOR LINE*********** 
NEXT I1%:SOUND 0,9 
REM KEKE AGAIN 2 EX RERRE RRR ARREARS 
PRINT" (E) TO EXIT" 
PRINT" (P) TO PLOT AGAIN" 
PRINT" (N) FOR NEW POINTS" 
INPUT AN$ 
AN$=LEFT$(AN$,1) 
IF AN$S="E"THEN STOP 
IF AN$="P"THEN GO TO 310 
IF AN$-"N"THEN:GO TO 130 
GO.TO 810 
END 


to the PLOT command on a MICROBEE. 


WwARHIMG S '!! 

ses 

WHEN UNPLUGGING 

OF 

EQUIPMENT INTO THE VZ, 
VZ POWER OFF. 


FAGE 


End points the same so PL 
point. 
Pick up another line. 


Change in X and Y direction 


Branch according to which 
difference is larger. 
Increment along Y-axis. 
Sign of STEP and GRADIENT. 
X-axis OFFSET. 

Initialize loop. 

Temporary real X-value. 
Integer X-value. 

PLOT point. 

END loop. 

Pick up another line. 
Increment along X-axis. 
Sign of STEP and GRADIENT. 
Y-axis OFFSET. 

Initialize loop. 
Temporary real Y-value. 
Integer Y-value. 

PLOT point. 

END loop. 


END main loop and PAUSE. 


Screen message or MENU. 


Accept response. 

Accept leftmost character 
Logical end of program. 
Go back and PLOT again. 
Go back for more input. 
Wrong response. 

Physical end of program. 


ne plotting routine similar 


ANY PIECE OF EQUIPMENT 
THE VZ, AND PLUGGING IN ANY PIECE OF 
ALWAYS SWITCH THE 


SERTOUS DAMAGE CAN RESULT IF THIS IS NOT 
DONE. 

















It may be a surprise to most BASIC programmers 
the FUNCTION command, along with SUBROUTINES, are 
-—25ab5bly the most useful commands. They are concise and 

arify coding considerably. Unfortunately only SUBS are 
mported on the VZ. 

i have also had many queries from Users on how to use 
FUNCTION statement in Program conversions. Read on... 

Level II BASIC supports two types of function - 

1. library (or system) functions. 
2. user-defined functions. 
Functions can be used to manipulate numeric or string 
та types. The VZ supports a number of intrinsic or library 
tions such as SUR, АТМ, РМО, CHR$, LEFT$ and INT etc. 
procedures for these are imbedded in the ROM, as BASIC 
iities. Steve Olney's Extended BASIC "wakes up" a few 
те, such as DEFINT, CSNG and STRINGS. 

Unfortunately one of the omissions from the full Level 
implementations on the vz is that user defined functions 
not supported in any way. Note that functions only 
гп а single value to the program. 

The lack of this feature often crops up when attempting 
convert programs to run on the VZ - but written in other 
Sielects of BASIC. The concise coding inherent in function 
R-I2fesents is also a desirable feature. Fortunately a 
uiriy Simple remedy is at hand and described below. 

The function statement has two components. The first is 
! definition of the function, and the second is the actual 
T*ementation or call to that definition. Let's explain..... 
= ме wish to frequently compute the area of a circle 
eee number of values for the radius. The command line 

10 DEF FNA(R)x $S.1416XRER should be declared early in 
prosram, where DEF means define, FNA means function А 

fetter from A to Z can be used to identify the particular | 
ceon) and (R) is the dummy argument (for radius) used by | 

| 
| 


Г. 


T s 





function. The right hand side of the assignment is the 
sily recognized formulae for calculating area of a circle. 
Later in the program when various values are assigned 
М either fron DATA or INPUT statements) we actually | 
culate the area by Calling the procedure as follows | 
ZOO PRINT V,FNA(V) 
The radius followed by the corresponding area will be 
еп out. 
5s already stated, this neat construct does not exist 
М2 BASIC. Judicious use of the SUBroutine statement can 
cose this shortfall however. Although the function calls | 
only return a single value, the SUBroutine can return many | 
ues > but a few more assignments are required before going 
the subroutine. 
Sn exeeple best illustrates this — let's use the previous 
ampie to show how it CAN be implemented on the VZ. ... | 
ФО INPUT“ENTER RADIUS OF НЕЕ“. В 
zO BOSUB 1000 
зо FPRINT"RADIUS"j,R,"AREA";4 
40 &D TO 10 
1222 A= 2.1415%ЖБжБ 
1010 RETURN 
Мо: «сс difficult to set up is it? But the coding and 
aa Siow is not quite as clear. 
Каме fun ' and don't be foxed by functions when next 
3 ag BASIC programs onto the VZ. 
















X x INTERFACE FOE COMFUNMUSE SYNTHESISER * * 


Some folk are having trouble when running the Compumuse unit 
^ via the FPrinter Interface. as the connections at the "D" plug 
which plugs into the printer, or in this case the Compumuse unit, 
are not a standard Centronics interfaces modifications to either 
are necessary. Also there appears to be at least two different 
versions of the Printer Interface, which affects the OUT command. 
Mr. Hall designed this extra little unit which latches the QUT 
command signal. 


VZ300 interfece addressed by :— DUT,7,XX 


The edge connector contacts of the Printer/Joystick socket 
looking from the top of the VZ3OO with keyboard in front of you 
as normal operation are .- Pin i is top row left, pin iS is top 
row right, Pin 50 із bottom right. This inter£ace will control 
the Compumuse а= described in Electronics Australia. Change the 
Basic listing to address Fort 7 IE. N-7  BUITN,XX. It could be 
used to control eight devices by #111105 driver transisters to Qi 
to Q7, IE. GUT7,1, OUTZ,Z and se on. l 


WARNING!! Some plug power packs a5 suggested to power the 
Compumuse unit ere oniy haltweve rectified and poorly filtered so 
hum may be present, and so distorting the sound. This may also 
cause the video to be shakey- 
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А SPACE BAX TO THE ҰҮ2200. 


| SK? You want to “Hack” so try this for 
1$; Er 


е 5 
setting tired of not iinding a space 


О ч 


"bar їп ihe right p'ece ] tried this:- 


You need а baseboard’ la inch 
Square,end a piece of masnnite cr piy 
*he same size. 


| 3Dou* 5 inches from ore edse of ihe 


расеБоватбусиі a slot say 3/10 ip. wide 
5y 35716 Ceep Tight across the basehoarc. 


New a piece of rod 3716 in dia. ard 
eéenou* 25 inches iong.] used a piece of 
SE fencing wire.Bend it as in fig.7. 
Nex* assemble .12" baseboard,tihe ріеге 
Gf pana. шыште,1?11 call it a уске, Кел 
че plw-masoni*te,and ihe О, 2, #9, 5, 

Өс The UE iS поі fastened down aii 
measures ore approx, 

Next Srother piece of uire,I isea a 
piece 0+ oa bike spoke ,is cut anc bert 


some îra like Ғі8,4.11 has а tai! beni 


Lo 45 21606. Іпе yoke and then rise 
apove the keyboard dy about 1/4 in.end 
Teach over to the space key ənd berd 
down to just cleer the space key, with 
"he yoke 3/78 in. of f tne baseboard, 
"hcm sorder' the tail of ¿his piere ta 
ihe yoke, Now Бепо this piece so the 
әсіпі just clears space.n piece of 
рэпе rubber under yoke hoids it this 
ЕНЕ acts as spripo.kter berdine this 
Fiece use 2Z fair of pliers so the sirain 
‚< noi take^ on the soidered joint, 

Nou a fiece -of tight wood (Ci used 
Šalsa wood) the  uidih of ihe compuier 
end  abosi 3/8” ру 1/4"”,Т7ғ1і5 fastens on 


| the yoke as itte thumd pad.!I used hot 


mei* oire іс giue it. to the sieel yoke, 


at you want a clear board to use the 
rrou кс;5 іп Semes,ijusi told it over 


Biome inf oad ilet itl rest on the beck of 
Be се 52. ет саѕе. 


ent 


a à 


GUICK AND EASY INPUT TO THE Vz. 


If you would like to be able to connect one to five Switches 
that would signal the VZ to print or Save something to be later 
used then this is the simplest way of all. 

The Switches could be part от а security alarm system, a 
doorchime system, etc. 

Open one of the Joystick units and connect wire/s to the 
nuteide connection/s. The common of all the switches is connected 
+o the centre contact. In other words, you are connecting your 
switches in parallel to the Joystick switches. 


If you want to teed the sound from the VZ piezo speaker to an 
amplifier for an alarm or doorchime system, a capacitor of about 
47n  t.047) 64 volts must be in series to BOTR connections to the 
amplifier. This is because the piezo speaker in the VZ is above 
around. Most amplifiers have one connection to ground unless it 
hes a balanced ungrounded input transformer. 


Any amplifier would be Suitable, preferably with its own 
nower supply. 


о 


ra 


іс 
~~ | 


r* a 


ramming the switch input coulda be similar to either of 
i 


the на= elsewhere in this book. 
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| wards you Қы bench, 
oe жш о the keyPad 
tion and CRREFLLLY hin$e 
| from it. Do not loose locations 
| the svitch  —— 
6 on diagram on the kesPad 
ect ale on PCB. edge 1 and 14 
€ a nS, Which will be in Parrallel 
IF > Кеу. Refit the keypad to | 
. Drill & small hole in the case 
Eos and install the EE 
and test. 








DATA RECORDER SOUND MONITOR. 


hear the computer sounds when 
loading and saving data and 
Programmes. A small hole, 10 MM 
diameter somewhere on the top 


pre-adjusted. 


earphone insert or Similar unit of 
et least 200 Ohms impedance. 


together. 





























It is very handy toe be able to 


surface of the DTR between the tape 
counter and the rear edge will 
allow the sound to be heard. The 
100K pot can be mounted near the 
hole, although control ағ the 
volume is not eccsential, so a tab 
pot can be mounted inside and 


The sound emitting device can 


be = dynamic microphone insert, an 


2 small tag strip mounted 
inside connects the components 
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rubber rollers. 
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For the rallerz 
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paper should zutrice. 
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Fut initialls T 
allina aff the 


mt; п. = "m 
act 
iv 
ж 


To use, slide the tongue under the 
the zProcket zha tallers zo thes are 
j . ы me t ГТ 
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haft rollerz. 


lines оп the PAàPer chute to 
rollers. Lastin., Place a 
hook, ower the arm to the other 


I hawe been using foolscar size Pa 


uc 


trimmins the ТОР aff with a БАРОР blade 
obtained s t€ 


растама I 


that size. If you're in the same boat, 
ыла Youl re after. 
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То get the most out of any hobby, it is usual to join a 
group/club so that you can get help and assistance if needed 


(everyone does) and share your finds with 


imterests, 


LE'VZ 200/300 OOP, 


others with Еге same 


John D'Alton, 39? Agnes St., TOOWONG, SLD, 4066, Australia. 


AD LIB Vee Zed MICRO, 


Gordon Browell, 15 Brookes St.,  BIGGENDEN,  GLD, 4621, 


Australia. 


VZ USER. 
Mark Harwood, Р.О. Box 154, 


NZ DOWN UNDER. 
Scott Le Brun, S Cameron Court, 


DURAL, NSW, 


2155, Australia. 


WANTIRNA, VIC, 3152, Australia. 


TAPE LOADING AND SAVING FORMAT. 
pu o 


Below are all the details that would be required for those 


programming in M/L in respect to tape routines. 


T: Text File 
SYNC. Bytes | 255Bytes of 80H 
HEADER 5 Bytes of FEH 
EXTENSION | Byte of FOH 
FILENAME 16 Bytes (max.) 
, of ASCII 
GAP 3 ms Blank 


START ADDRESS | 2 Bytes of binary 
END ADDRESS 2 Bytes of binary 
Program Content xx Bytes 


Data Content Do ж е 


Checksum 2 Bytes | 
End of File 20 Bytes of Zeroes 
Marker (EOF) (00H) 


Terminator _ 


B: Binary File 


255 Bytes of 80H 
5 Bytes of FEH 
1 Byte of F1H 


16 Bytes (max.) 
of ASCII 

3 ms Blank 

2 Bytes of binary 
2 Bytes of binary 
xx Bytes 


2 Bytes 


20 Bytes of Zeroes 


D: Data File 


255 Bytes of 80H 
5 Bytes of FEH 
1 Byte of F2H 


16 Bytes (max.) 
of ASCII 


3 ms Blank | 


== == 


xx Bytes 
2 Bytes 


1 Byte of 00H 




















BLY PROGRAMMING. 


3 E. онгу to start this method of programming is to 
^$n DECimal.values equivelant to HEX values into 
BE scene. The first little programme, Screen 


е 
E 


‘ried out in this way. For serious programming you 
EDITOR/ASSEMBLER unit, such as TU2 or the D.S.E. 


i= to use a MONITOR/DEBUGGER such as TUT. 


scing to teach you this very exacting form of 
ais beyond the scope of this book. 


ғ? 


ЖЖ 
B E nut 


LT 
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p: ЕБТЕР XX 
ОВЕН WILLOWS Xx 
n ыы 
5270-25622% 
Lo НЕХТ. 
112,1,0,4:22,0,126, eo94.95.4B. 3,222959. 53.32 
| 23222 Е АЕ 16.32.21, 281 
2,238: POKES 2,142 . 


2ammimoe for the МР Joysticks. Machine Code ^ Rzsembls 


IYS STICK PROGRAMMING Е 
гео | 15T ROW 
5K R< ZEH? 


4 е 





ао; тобе: ; 
b jossticks and returns with the 
Sisters. The aPF "iste bit is set to 1091с 1 
riled, E D Mist the "fire" suitches are 
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TWO M/L "FATCHES" TO ALLOW A PRINTER TO WORK WITH THE D.S.E. 
EDITOR/ASSEMBLER UNIT. 


There appears to be more than one version of the D.S.E. unit, 
as my GP100 operates О.К. Тһе first patch was sent by Jamie Perry 
ot the D.S.E. Hot LINE. 


The second from DR.F Thursby. 


Eelow is a patch to enable your editor assembler to list 
source code. As stated in the manual using option C. 

First enter Insert mode by entering “*I’- Then set code origi 
entering 70”. Now type in the below program, pressing RETURN at 
end of each line. 


8168! LD BC,OCH :Size of transfer is 12 bytes. 

Q02 ` LD #HL,LOOP :Foint to new printer routine 

OQ LD DE,8F°4H :Foint to editor assembler print out 
004 LDIR :Transfer routine to editor assembler 
ооо JF X 7BOOF :Return control to editor assembler 
OOS LOOP IN A, (OOF sLoad printer status © 

O07 BIT ON ş Check ready bit 

оов JR NZ,LOOF :Repeat LOOF if not ready 

009 LD A,C . :eLoad Accumalator with print data 
010 OUT (OEH),4A „Пири data to printer port 
011 DUT ({ODH),A sAnother port for an early interface 
012 RET :Get next character 


Now assemble the program by entering *A*. Now RUN the progr 
entering ?К? then press "Y^ to verify you wish to execu? 
program. Finish up by deleteing the program by entering 
Your editor assembler may list programs now, just by sels 
option *C?.(enter *SC*). i 


1 »*** TEST РВОСВАМ 1 *** 

2 ; 

3 : P.THURSBY 12/85 

4 TO USE CHAR OUT ROUTINE 

5 «ON VZ300 COMPUTER. 

6 SOUT EQU 33AH 24 CALL SOUT 
7 CLR EQU 1С9Н 25 DJNZ LOOP 
8 EDIT EQU 7B00H’ i 26 POP BC 

H : 27 JP EDIT 
10 БАУЕ ALL REGISTERS 28 ;JUMP TO EDITOR/A 
31 STRT PUSH AF 29 ;ASSEMBLE AT "O d 
12 PUSH DE 30 

13 PUSH HL 

14 PUSH BC 

15 CALL CLR 

16 POP BC 

17 POP HL 

18 POP DE 

19 | РОР АЕ 

20 eNOW FOR SOUT ROUTINE 

21 PUSH BC 

22 - JBD»-abBad55 

23 LOOP LD  2A,24H 





у zao Assembler can fill the 










D 
Tece 


2 * cam was written. It also 


erent ckground colours, colour 
re EI i on the VZ. To really 


move а. ong б. Za3ne 62 to D-1. 


INSTANT COLOR xxx 
"AFC AUGUST TUR ЖЖЖ 












ЖЖЖ 





Bu aa 


2506: 










4 (#285725 START VIDEO RAM) 
01 on - «жізе7Іір МЕХТ) 
ж un. SIZE OF VIDEO RAM) 
Н (8850 YELLOW OR CHAR "U") 
(BLOCK LOAD COMMAND) 





55 SFF1H ОК 8-28587Dxxx 


= Е 5ВЫМЬ Т.О 
ILL 2K VIDEO RAM WITH CHAR. xxx 


d 
un. 4 
àl 


Ra C dp "LL 
* 


program 
contents 


I 


gg1 
gol 
po. 
аба 
BAS 
BBG 
Әу? 
6005 
go 
Bigs 
Gil 
£12 
013 
#14 
5615 
616 
pic 
012 
Gis 
928 
G21 
622 
525 


© 


л (дыш CI 
AG hh € & 


Оа осо © 


"Was 
addresses 


RETN 


NEXT 


HEX 


«la 
m 
X 
h) 


DISP 


iT 


This program looks for a specified byte. 
backspaces 

of the address being pointed to, 
The search covers the entire ROM and the DOS region. 
Searching 


Rm куу Рр л Р = 
"ч E 


Once it 


to the byte 


in HEX to the 


previous 


the contents for the 


in the range from 7AØØH to ZAFFH. - 


CALL 
LD 
LD 
LD 
CF 
JR 
PUSH 
PUSH 
DEC 
LD 
INC 
LD 
CALL 
LD 
CALL 
LD 
CALL 
POP 
POP 
INC 
DEC 
LD 
OR 
JR 
CALL 
JF 
PUSH 
RRCA 
RRCA 
RRCA 
RRCA 
CALL 
РОР. 
AND 
ADD 
CP 
JR 
ADD 
PUSH 
LD 


. CALL 


РОР 
КЕТ 


5АЕ2Н IF no printer change to CALL S1CSH 
BC, 6989H 

Н. ‚брен | f 
&, (HL) . 
ZAH 
Nz,NEXT 
BC 

HL 

HL 

B, (HL) 
HL 

A, (HL) 
HEX 

A,B 

HEX 
C,32 
£598DH 
HL 

BC 

HL 

BC 

А,Б 

С 

NZ RETN 
SAE2H sIf mo printer then omit this line 
51488 If assembling change to JP 1A19H 
AF 


;Save the low byte contents in EB 
to the next byte 
A with the high byte contents 


; Моме 
¡Load 
Load A with the low byte contents 


sIf rno printer change to LD 4,32 
;If no printer change to CALL £g334AH 


НЕХР 
АЕ 

GFH 

A, 38H 
ЗАН 
C,DISP 
5.7 

HL 


с,а 


g58DH sift mo printer change to CALL B33AH 


“HL 


is found t 
and then prints th 
brinte 
In this ca 
actual Communicatio 








иу 


d 


225 
223 
2705 
215 
211 
Ві? 
615 
2:4 
£15 
£16 
g17 
gis 
215 
| g29 
£21 
822 
225 
ета 
625 
_ 226 
£27 
ga232 
g29 
9855 
851 














#857 


Ж “ a 


1 

к. 

EL 
a 


-— 
< 


милан O O 


zir 
tire 


езг. 


ERLIL 


се. 
іс 


E243 RETN 


NEXT 


HEX 


НЕХ2 


DISF 


program 
Once 

printed 
ROM and the DOS region. 
ny reference to 7AE9H, the start of Basic pointer. 


CALL 
LD 
LD 
LD 
CP 
JR 
INC 
PDC 
CF 
JR 
PUSH 
PUSH 
DEC 
LD 
LD 
CALL 
LD 
CALL 
LD 
CALL 
POP 
POP 
INC 
DEC 
LD 
OR 
JR 
CALL 
JP 
PUSH 
RRCA 
RRCA 
RRCA 
RRCA 
CALL 
POP 
AND 
ADD 
CP 
JR 
ADD 
PUSH 
LD 
CALL 
POP 
RET 


in 


3AE2H 


BC,6999H 
L,8996H 


А, СНЫ; 
SESH — 
NZ, NEXT 
HL 

A, (HL) 
7AH 
NZ,NEXT 
BC 

HL 

HL 

B. 

А,Н 

НЕХ 

A,B 

HEX 
C2 
S58DH 
HL 

BC 

HL 

BC 

A,B 

С 
NZ,RETN 
5АЕ2Н 
51488 
АҒ 


HEX2 
АЕ 
gFH 
A, 39H 
3AH 
C,DISP 
А,7 
HL 
с,а 
S58DH 
HL 


searches 
found the location containing the low byte of the 
The search covers the 
in this case I was searching for 


HEX 


rac >? 


for a pair of bytes, thet is, 


to the printer. 


Load A with the contents of HL 

sCheck to see if it is equal to EFH 
$1+ not go on to the next byte 

;If yes move on.one place 

Load A with contents of new place 
¿Check to see if contents equal to 7AH 
sIf not go on to next byte 


Save the low byte contents in B 
Load A with the high byte 


sLoad A with the low byte contents 
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Enhancing VZ Basic by Larry Taylor 


The Commodore “44 has advanced hardware suppor ted by an 
inadequate Basic language, resulting in a number of enhanced 
Basics being available. Something similar could be produced 
for the VZ. It must be noted, however, that all such Basics 
share a common disadvantage. Any program which makes use of 
them requires the language be loaded before it will function 
properly. 


Because Basic is ап interpreted language additional 
commands can be inserted, if they can be intercepted and 
executed before reaching the VZ‘s own interpreter. This is 
precisely what happens when a disk operating system (DOS) is 
added. New commands enabling disk operations to be 
performed, supplement the existing Basic. However, all 
programs using those extra commands require the DOS to be 
present before execution or they will not be interpreted 
correctly. 


When a Basic program is RUN, control passes to a machine 
language ROM routine, the Execution Driver at 1DSAH, which 
Scans each line of the Basic program as it comes to it and 
begins to translate it. Part of the translation process 
involves looking for tokens. These are values in the range 
128-250 (ВОН-ҒАН) that take the place of Basic reserved 
words e.g. CLS = 132 (84H). Once the word has been 
identified and checked for correct syntax, control is 
passed to the corresponing ROM routine before returning to 
continue the translation. This is similar to one person 
issuing instructions to another through an interpreter, who 
first has to translate them before the receiver can act, and 
is the reason for Basic’s slow execution. Most languages get 
around this problem by having the program translated or 
compiled before execution. 


Tandy's Colour Computer Һаѕ an enchanced CLS command 
which enables the user to clear the screen to any one ot 
nine background colours. The syntax is CLSn, where n may be 
a number in the range O-8. To illustrate how enhancements 
can be accomplished, this command will be added to the VZ's 
repertoire. 


On power up the address of the routine which examines 
each byte in а line of Basic, is stored at 7804H. Because 
this address is in RAM it can be easily changed. This was 
done so that at a later stage the DOS could be included. 
However , it also means that, just as readily, an enhanced 
form of Basic may be added. The trick is to ensure that, as 
far as the VZ‘s interpreter is concerned, nothing unusual 
has happened. The accompanying assembly language listing 
shows how this can be accomplished. 


ENEENEENMEET-VHINTZ-VHARDWAFEZ UCL : FAC 


— 


Having adjusted the top of memory pointer, the address 
mt 7804H is stored and replaced by our own. The program then 
Tocats the new routine at the top of memory. Now each time 
= Byte is to be examined during execution it must first pass 
em sugh our checkpoint. Once the origin of the call is 
established, the routine looks for the CLS token, 152 (B4H). 
niy when it has been located does the routine proceed to 
Examine the next byte. This is checked to see if it lies in 
ee range 0-9. Once it has passed this test, the clear 
Soreen routine is implemented after first calculating the 
EBDropriate value with which to fill the screen. You will 
тотісе that not only is it necessary to check for the new 
ommend, but also to provide the routine which implements 
ae. in this case a simple block load to the screen has been 
esd. Control is then returned to the ROM processing 
—outine, which prepares to examine the byte following our 
mew command. So, as far as the VZ knows, everything is 
Seontinuing normally. Tricky isn’t it? 


i have already successfully used this approach to 
produce a VZ Printer Patch, which enables all the normal 
Srinter functions for owners of EPSON or EPSON compatible 
printers. The COPY command is intercepted by the patch and 
as a result its function has been enhanced to allow a proper 
Sump of both the LO-RES and HI-RES screens. One further 
enhancement that could be explored would be an extension of 
Basic s SOUND command. The possibilities are limited only by 
Imagination and memory. 


0001 
0002 
0005 
0004 
0005 
0006 
0007 
0008 
0009 
0010 
0011 
0012 
0015 
0014 
0015 
0016 
0017 
0018 
0019 
0020 
0021 
0022 
0023 
0024 
0025 
0026 
0027 
0028 
0029 
0050 
0051 
0052 
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SHHHHHHHAHHHH TRH REST H HAS HS 
># ENHANCED CLS COMMAND # 
;*" BY | ARRY TAYLOR 1986 # 
LHENPHHRHHRHHH RHR RAAT HEH 


s ORIGIN = /BOOH 
: THIS SECTION RELOCATES 
>THE PROGRAM TO THE TOP 
:OF AVAILABLE MEMORY. 
VCTR EDU 7А28Н :SET VCTR AS 76528H 
LD SP ,7700H :LOAD STACK POINTER 
LD Hi, (78B1H) :GET THE TOP OF MEMORY 
LD С.ЕМОР-МУСТ ; GET LENGTH OF PROGRAM 
PUSH BC : SAVE PROGRAM LENGTH 
XOR A :RESET ALL FLAGS 
SBC  HL,BC » TAKE LENGTH FROM TOP OF MEMORY 
LD (78B1H) ,HL s LOAD NEW TOP OF MEMORY 
PUSH HL ş SAVE NEW TOP OF MEMORY 
XOR A : RESET ALL FLAGS 
LD BC: SSH s RESERVE 50 BYTES STRING SPACE 
SBC HL,BC :ТАКЕ SPACE FROM TOP OF MEMORY 
LD (7BAOH) , AL :LOAD START OF STRING SPACE 
POP DE :RETRIEVE TOP OF MEMORY 
INC > ВЕ : INCREASE BY ONE 
LD L, (7804H) :GET CURRENT RST10OH VECTOR 
LD (VCTR) ,HL :GTORE IT IN 7A28H 
LD (7804H) ,DE :LOAD NEW VECTOR 
LD HL ,NVCT + GET START OF PROGRAM TO MOVE 
POP BC ‚ FKETRIEVE PROGRAM LENGTH 
LDIR ; MOVE TO NEW LOCATION 
CALL 1B4DH :DO А NEW 
ЈР 1619H ;JUMP TO READY MESSAGE 
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75 SKIP 


"AG 
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DF THE PROCESSING 


JET EXX 


LD 
POP 
OR 
SBC 
PUSH 
EXX 
JP 
PUSH 
CALL 
JR 
POP 
LD 
PUSH 


POP 
LD 
PUSH 
INC 
PUSH 
ADD 
ADD 
ADD 
ADD 
JR 
INC 
ADD 


LD 
LD 
LD 
LD 
LD 
LDIR 
POP 
RET 
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HL , 1D5BH 
DE 

A 

HL , DE 

DE 


NZ,1D7BH 
HL 

1D78H 

NZ, CONT 
HL 

DE, (VCTR) 
DE 


84H 
NZ,POP 
HL 

A, CHL) 
зон 

7. ЕХЕС 
в, В 
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7. ЕХЕС 
CMPR 

POP 

DE 

DE 

DE, 1D1EH 
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7 CLEAR SCREEN ROUTINE 


HL, 7ZOOOH 
(7820H) ,HL 
DE,7001H 
ВС, О1ЕЕН 
(HL) ,4 


HL 


о 


;RBUTINE FOR NEW COMMAND. 


; SAVE ALL REGISTERS 

; CHECK TO 

s SEE IF THE 

s RETURN 

s ADDRESS 

;iS 1D5BH 

; RESTORE ALL REGISTERS 

s IF NOT GO TO NORMAL PROCESSING 
; SAVE STRING ADDRESS 

; БЕТ NEXT VALUE FROM STRING 
IF NOT ZERO THEN CONTINUE 
;ELSE RESTORE STRING ADDRESS 

; RETRIEVE ORIGINAL VECTOR 

; AND JUMP 

STO ITF 

sCHECK FOR CLS TOKEN 

s IF NOT FOUND RETURN TO CALLER 
s MOVE ТО NEXT VALUE IN STRING 
; GET NEXT VALUE AFTER CLS TOKEN 
; REDUCE IT TO RANGE O-B 

s IF ZERO THEN EXECUTE COMMAND 
sLOAD B REG WITH UPPER LIMIT 

; CHECK IF A-B 

;IF YES THEN EXECUTE COMMAND 

; REDUCE B AND CONTINUE CHECK 
sNO MATCH SO RETURN TO CALLER 
sRETRIEVE OLD STRING ADDRESS 
sRETRIEVE OLD RETURN ADDRESS 
;LOAD NEW RETURN ADDRESS 

; SAVE NEW RETURN ADDRESS 

;MOVE TO NEXT VALUE IN STRING 
; SAVE CURRENT STRING ADDRESS 
ЗЕ ЯР GES 

; VALUE BY 16 TO 

; CALCULATE THE 

s COLOUR DFFSET 

si КЕБИ Т NOT ZER@ THEN SKIP 
s IF ZERO INCREASE TO DNE 

; ADD 127 TO GET GRAPHICS BLOCK 


;LOAD START OF SCREEN ADDRESS 
;SSET CURSOR POSITION 

sLOAD START OF SCREEN PLUS ONE 
;NUMBER OF BYTES TO MOVE 

;LOAD GRAPHICS BLOCK INTO HL 
;DO A BLOCK FILL OF THE SCREEN 
RETRIEVE STRING ADDRESS 

; RETURN TO 1D1EH TO CONTINUE 
:END OF PROGRAM MARKER 
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- 16384 


- 16385 
- 18432 


- 18433 
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+3276] 
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16K Expansion 








E 
ый 5 VZ - 20€ 
e E x 
wo x Std. + | 64K 
ES = 16K Expansion Memory Expansion 
65535 FFFF - 
6348E E800 = 
63487 F7FF 
Ax „ж = 
с = Е 
жс = = 
En со = 
& = = 
Ес сг = 
tw рез E 
u5 im e 
= c o 
w ы а 
53248 D000 5 5 9 
53247 CFFF = = == 
5 2 A 
49152 cooo = 
49151 BFFF = 
47104 ВЕ00 - 
47103 B7FF Б 
: ил 
Е 
m 
e l2K top of fixed 
LU RAM Bank 
ET 
= 
36864 9000 
36863 BFFF 
Internal User RAM 6K 
30720 7800 Reserved RAK 
719 77FF | 
з 7000 Video RAM 2K 
28571 БЕРЕ 
26624 5800 Memory Mapped 1/0 2K 
26623 67FF 
24576 6000 Ж 
24575 SFFF С 
ч 
a 
> 
i 
e 
wi 
a 
= 
16384 4000. 
16353 3FFF 
B182 2000 
ЗЕР 1FFF 
0 0000 Port Addressed 1/0 
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Switched 15K RAM Bank 
Switched 16K RAM Bank 


2K top of 
RAM Bank 


Internal User RAM 16 


Reserved RAM 
Video RAM 2k 
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MEMORY MAPPING 
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R. B. KITCH March 
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* X * SOFTWARE X X* x 


КОШЫ s large 5.А.5.Е. for 8 VLISTZ. 


Басы __ 


=== ıe just а few that cevuld be usefull in conjunction 
4 -— ni 2 
ENNE EBITOP/ASSEMPLER $ 20.00. 
= EXTENDED BASIC Ф 15.00 
" 
ECCNOGNITOP/DEBUGGER $ 25.00. 


M EXTENDED BASIC $ 12. 


un 
C 


One about twice the size, markings every 


ПЕС. Ft car then be used when setting out LOW RES graphics or 
Bu ritipa "m —3 + = } | 
КЕНО ЕУ uritino or it with a pen that can be rubbed clean with a 





- = = а \ x а 
ESSI = large range of exclusive tepe and Disc software. 
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This is part of the VZ communications area. It is invaluable for those 


who are programming in M/L. 
& 200 / 300 COMMUNICATION AREA - RESERVED RANDOM ACCESS MEMORY 
RESERVED WORD LIST | | 
Reserved words typed in ITALIC indicate the interpreter does no 


the word. The token however is recognized, and will be acted up 
accordingly 


Reserved TOKEN VALUE Address of 
word Hex Decimal Rom Routine 
ABS 09 217 0977 
AND D2 210 25FD 
ASC Fé 2456 2АОҒ 
АТЫ E4 228 i 5BD 
AUTO B7 183 2008 | 
CDBL F1 241 ODAB | 
GHR $ F7 247 2A1F 
CINT EF 239 OATF 
CLEAR BS 184 1E7A 
CLOAD B9 185 3656 
CLS 84 132 01C9 
CONT B3 179 1DE4 
COS E1 225 1541 
COLOR 97 151 389D 
COPY 96 150 3912 
CRUN 9C 156 ЗҮ?Е 
CSAVE BA 186 34А9 
CSNG FO 240 ABI 
DATA 88 136 1205 
DEFDBL 9B 159 120$ 
DEFINT 99 153 1Е03 
DEFSNG SA 154 1EO06 
DEFSTR No recognized token 1Е00 
DELETE & 182 2505 
* DIM ВА 138 2608 
ELSE 95 149 1РОТ 
END 80 128 1DAE 
ERL CZ 192 _24рр 
ЕЕЕ C3 193 24CF 
ERROR 9E 158 ЇРР4 
ЕХР EO 224 1439 
FIX F2 242 052% 
FOR 81 129 1 СА1 
FRE DA 218 27 D4 
GOSUB 91 145 1EB1 


GOTO вр 141 1EC2 
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3 / 300 COMMUNICATION AREA - RESERVED RANDOM ACCESS MEMORY 





ved TOREN VALUE Address of 
| Hex. Decimal Rom Routine 
BF 143 2039 
C9 201 0190 
DE 219 ZAEF 
85 127 219A 
DB 216 OB37 
F8 248 2861 
ҒЗ 243 2803 
вс 140 1221 
B4 180 2Е2Е 
BS 181 2B29 
DF 223 0809 
ВР 175 2067 
Ca 200 27C9 
FA 250 2898 
9D 157 2Е63 
ВВ 187 1B49 
87 135 22В6 
СВ 203 25С4 
A1 161 IFCS 
D3 211 25Е7 
АО 164 ZAFB 
ES 02550). 2CAA 
G6 198 0132 
Bi 171 2СВ1 
Dc 220 27F5 
B2 178 206Ғ 
86 134 O1D3 
BE 139 ТЕР 
93 147 1F07 
82 130 0138 
90 144 1D91 
oF 159 IFAF 
92 146 1EDE 
F9 249 2491 
DE 22 1409 
BE 142 1EA3 
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VZ 200 / 300 COMMUNICATION AREA - RESERVED RANDOM ACCESS MEMOR 





Reserved TOREN VALUE Address of 
word Hex. Decimal Rom routine 
SET 83 131 0135 
SGN D7 219 098А 
SIN E2 226 1547 
SOUND TE: i58 2ВҒ5 
SOR DD 221 13E7 
STEP CC 204 2801 
STOF 94 148 iDA9 
STR$ F4 244 2836 
STRINGS C4 1%6 РА?Е 
ТАЕ ЕС 188 2137 
ТАМ ЕЗ 227 1548 
THEN СА 202 2039 
TO BD 189 1CÀ1 
TROFF No recognized token 1DF8 
TRONN No recognized token ГӘР? 
USING BF 191 ZCBD 
USR C1 193 LIFE 
VAL FS 245 ZACS 
VERIFY 98 152 3738 
VARPTR CO 197 24EB 


1f you are having any problems with any article or programme in 

this book don't hesitate to contact me. Also for any input, suggestions 
etc, please write or 'phone. Any communications in writing that you 
require, MUST INCLUDE A S, A,S, E. with your request. 


God bless... . John D'Alton. 





